
ATE_ALL=zeros(3,2);
TT_ALL=zeros(3,2);
CI_ATE_ALL=zeros(3,2);
CI_TT_ALL=zeros(3,2);
Nation_change=zeros(3,1);

load ('eco_chile_all_paper.mat')
ATE_ALL(1,1:2)=[ATE(16,1),ATE(16,2)];
TT_ALL(1,1:2)=[TT(16,1),TT(16,2)];

CI_ATE_ALL(1,1:2)=[CI_ATE(16,1),CI_ATE(16,2)];

CI_TT_ALL(1,1:2)=[CI_TT(16,1),CI_TT(16,2)];
Nation_change(1,1)=delta(16,1);
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
load('eco_chile_male_paper.mat')
ATE_ALL(2,1:2)=[ATE(16,1),ATE(16,2)];
TT_ALL(2,1:2)=[TT(16,1),TT(16,2)];

CI_ATE_ALL(2,1:2)=[CI_ATE(16,1),CI_ATE(16,2)];

CI_TT_ALL(2,1:2)=[CI_TT(16,1),CI_TT(16,2)];
Nation_change(2,1)=delta(16,1);

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
load('eco_chile_female_paper.mat')
ATE_ALL(3,1:2)=[ATE(16,1),ATE(16,2)];
TT_ALL(3,1:2)=[TT(16,1),TT(16,2)];

CI_ATE_ALL(3,1:2)=[CI_ATE(16,1),CI_ATE(16,2)];

CI_TT_ALL(3,1:2)=[CI_TT(16,1),CI_TT(16,2)];
Nation_change(3,1)=delta(16,1);

gender={'Country'; 'Men'; 'Women'};

xaxis=1:3;
subplot(2,1,1)

%boxplot([CI_ATE_ALL(:,1),ATE_ALL,CI_ATE_ALL(:,2)]','orientation','horizontal')
boxplot([CI_ATE_ALL(:,1),ATE_ALL,CI_ATE_ALL(:,2)]',gender')
grid on
axis([0 4 -0.8 0.6])
title('ATE  ') 
%xlabel('Gender')
%ylabel('\Delta y')
hold on
scatter(xaxis,Nation_change,'b*')%or b*r+
hold off
subplot(2,1,2)

%boxplot([CI_TT_ALL(:,1),TT_ALL,CI_TT_ALL(:,2)]','color', hsv(1))
boxplot([CI_TT_ALL(:,1),TT_ALL,CI_TT_ALL(:,2)]',gender')
grid on

axis([0 4 -0.8 0.6])
title(' ATT  ') 
%xlabel('Gender')
%ylabel('\Delta y')
hold on
scatter(xaxis,Nation_change,'b*')%or b*r+
hold off

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%figure;

%boxplot([CI_ATE_ALL(:,1),ATE_ALL,CI_ATE_ALL(:,2)]','orientation','horizontal')
%boxplot([CI_ATE_ALL(:,1),ATE_ALL,CI_ATE_ALL(:,2)]',gender')
%grid on
%axis([0 4 -0.8 0.8])
%title('ATE  and TT ') 
%xlabel('Gender')
%ylabel('\Delta y')

%hold on
%boxplot([CI_TT_ALL(:,1),TT_ALL,CI_TT_ALL(:,2)]',gender','color', hsv(1))
%boxplot([CI_TT_ALL(:,1),TT_ALL,CI_TT_ALL(:,2)]',gender')
%grid on

%axis([0 4 -0.8 0.8])
%legend off
%hold off








%x=rand(3,5);
%labels={'row1'; 'row10'; 'row100'};
%boxplot(x',labels');







%load carsmall
%      boxplot(MPG, Origin)
 %     boxplot(MPG, Origin, 'sym','r*', 'colors',hsv(7))
  %     boxplot(MPG, Origin, 'grouporder', ...
   %                 {'France' 'Germany' 'Italy' 'Japan' 'Sweden' 'USA'})
%load('eco_chile_3539yo.mat')
%figure;
%%%        ATE    %%%%%%%%%%%%%%%%%
    
%boxplot([CI_ATE(:,1),ATE,CI_ATE(:,2)]')
%grid on
%axis([0 17 -0.8 0.8])
%title('ATE 18-24 ') 
%xlabel('Regions')
%ylabel('\Delta Y')
%hold on
%scatter(xaxis,delta,'b*')%or b*r+
%hold on
%boxplot([CI_TT(:,1),TT,CI_TT(:,2)]','colors',hsv(1))
%hold off

